home *** CD-ROM | disk | FTP | other *** search
/ Shareware Grab Bag / Shareware Grab Bag.iso / 003 / db3tech.arc / LABEL1.DOC < prev    next >
Encoding:
Text File  |  1985-11-04  |  1.9 KB  |  53 lines
  1. PROGRAM NAME: Label1.PRG 
  2.  
  3. DESCRIPTION:  Program to print customized labels
  4.  
  5. ISSUE: August, 1985
  6. PAGE:  22
  7.  
  8. SOFTWARE VERSIONS:  dBASE III, versions 1.0, 1.1
  9.  
  10. FUNCTION║ Label1.PR╟ i≤ ß procedurσ filσ tha⌠ contain≤ DOLABEL¼ ß ì
  11. procedurσá tha⌠ print≤ morσ thaε onσ labe∞ across«á  I⌠ simulate≤ ì
  12. the operation of the LABEL FORM.  
  13.  
  14. FILES NEEDED: Label1.PRG
  15.               Database file to print labels
  16.  
  17. SETUP INSTRUCTIONS:
  18.  
  19. Assigε you≥ prin⌠ linσ expression≤ iε thσ bod∙ oµ thσ DOLABE╠ ì
  20. procedure«  Bσ surσ tha⌠ eacΦ prin⌠ linσ expressioε i≤ withiε thσ ì
  21. TRIM(⌐ function« Fo≥ eacΦ linσ t∩ print¼ therσ i≤ ß memor∙ ì
  22. variablσ tha⌠ begin≤ witΦ "lineó anΣ ß numbe≥ reflectinτ thσ ì
  23. prin⌠ line«  Thesσ memor∙ variable≤ arσ createΣ iε thσ commanΣ ì
  24. line:
  25.  
  26.      STORE "" TO line1, line2, line3, line4
  27.  
  28. Modif∙ thi≤ commanΣ linσ t∩ reflec⌠ thσ numbe≥ oµ line≤ iε you≥ ì
  29. label.
  30.  
  31. If you wish to use the program without change, USE a database
  32. file structure as follows:
  33.  
  34.           Field           Type            Length 
  35.           Name            Character       <any length>
  36.           Company         Character       <any length>
  37.           Address         Character       <any length>
  38.           City            Character       <any length>
  39.           State           Character       <any length>
  40.           Zip             Character       <any length>
  41.  
  42.  
  43. T∩ ruε thσ DOLABE╠ procedure¼ yo⌡ mus⌠ pas≤ PARAMETER╙ t∩ it«  ì
  44. The∙ are¼ iε orde≥ oµ passing║ databasσ filename¼ inde° filename¼ ì
  45. FILTE╥ condition¼ numbe≥ oµ label≤ across¼ labe∞ width¼ numbe≥ oµ ì
  46. space≤ betweeε labels¼ anΣ printe≥ toggle«  Thσ synta° i≤ a≤ ì
  47. follows:
  48.  
  49.  DO Label1 WITH <expC>,<expC>,<expC>,<expN>,<expN>,<expN>,<expC>  
  50.  
  51. A typical example:
  52.  
  53.  DO Label1 WITH "Yourfile","Yourndx","Zip='95'",2,35,2,"Y"